================================================================
\********************  FanRenKQJ.ocx  *************************\
ģ SPKQJ3	10λ()

λŷ:	λΪBit0(ʮ15=00001111,Bit0-3Ϊ1;Bit4-7Ϊ0)
		 0 0 0 0 1 1 1 1
		Bit7----------Bit0
================================================================
// 
1.ˢӵ70(Ż༶)
2.ֿΪGBK(23940)
3.ɶΪ6(ĸ12)
4.ע1
5.¼8.8
6.ͬͷ:Gprs\TCP\485\232ͨŷʽ
7.ICԶ忨\ˢǴ\ȹ(CardPwdSet\CardSettingICݲ˵)
8.,ͬĿڿָ䷢(⹺),ʵְַ౨

----------------------------------------------------------------
Language
: (Ĭ)뷱ѡ=0;=1
ע: ʱҪı
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
CommPort
ͨѶĶ˿ֵ
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
CommSettings
ͨѶĶ˿ڲ
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
ConnectMode
ͨŷʽ:0=;1=TCIP
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
RemoteHost
ĿĻIP,IPʽ:xxx.xxx.xxx.xxx(xʾ0-9һ,IPһֵΪ0ʱ,ʹûIDIPһλ)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
RemotePort
ĿĻĽն˿
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
ConnectPwd
ʱʹõ6λIP(Ϊ6λ)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
ServerHost
תIP
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
ServerPort
תĽն˿
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
SendDaId
ֵΪ-1ʱ,Ϊ첽,ͽ󷵻رεķID(SendACKEvent¼ֵͬʱOK)
ֻдʱ,ʱ
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
PortOpen
ͨѶĶ˿״̬
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
OnlineKQ
״ֵ̬(򿪻رսն˿)0(ֵ)رս״̬(رInputEventRe¼);1(ֵ)ʵʱ״̬(InputEventRe¼)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
CancelWork
ֹǰ1(ֵ)Ч
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
CardLength
:ʹÿŵĳ
////////////////////////////////////////////////////////////////


----------------------------------------------------------------
ErrNumber
:û(ͨGetErrMessageȡϢ)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
GetErrMessage(ByVal Err_Number As Long) As String
: شıϢ

Err_Number	û(ErrNumber)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function MCU_SN(ByVal MCID As Integer, Optional ByVal AdminCode As String) As String
: ػкż

		˵
MCID		ѡID
AdminCode	ѡдֵ
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function WritePwd(ByVal MCID As Integer, ByVal PwdV As String) As Boolean
: ûIP뼰֤뵽ָػǷӦ

		˵
MCID		ѡID
PwdV		ѡΪ6λ(ǰһλΪ@ʱд10ֽڵ֤,ΪHEXʽ,:@A1A2A3A4A5F1F2F3F4F5)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function BaudUp(ByVal MCID As Integer, ByVal KQJBaud As Long) As Boolean
: ûͨѶʵָػǷӦ

		˵
MCID		ѡID
KQJBaud		ѡµĲ(4800\9600\19200\38400\57600\115200)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function EnrolModeSel(ByVal MCID As Integer, Optional NewVal As Integer, Optional ByVal bRead As Boolean = True) As Boolean
: ûĿƬעģʽָػǷӦ

		˵
MCID		ѡID
NewVal		ѡbRead=1;bRead=0д(bit0-2=0:ֻҪעͿˢ\1:עᲢŽЧЧʱſˢ\2:ƬעͿˢ\3:ƬעŽЧʱˢ; bit3=1ʱʵˢʱ¼ͬʱԶϴ)
bRead		ѡģʽ(1 True=0 False=д)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function ContrastSet(ByVal MCID As Integer, Optional NewVal As Integer, Optional ByVal bRead As Boolean = True) As Boolean
: ûLCDĶԱȶָػǷӦ

		˵
MCID		ѡID
NewVal		ѡbRead=1;bRead=0д(ֵ:0-63,ȱʡֵ50)
bRead		ѡģʽ(1 True=0 False=д)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function BackLight(ByVal MCID As Integer, Optional NewVal As Boolean, Optional ByVal bRead As Boolean = True) As Boolean
: ûLCDıģʽָػǷӦ

		˵
MCID		ѡID
NewVal		ѡbRead=1;bRead=0д(0:Զ\1:)
bRead		ѡģʽ(1 True=0 False=д)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function ClearData(ByVal MCID As Integer) As Boolean
: ջڵˢ¼ָػǷӦ

		˵
MCID		ѡID
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function EnrolCard(ByVal MCID As Integer, ByVal CardID As String, Optional ByVal tName As String, Optional ByVal DoorGroupA As Integer = 0, Optional ByVal DoorGroupB As Integer = 0, Optional ByVal InfoGroup As Integer = 0) As Boolean
: ڵĿżעָػǷӦ

		˵
MCID		ѡID
CardID		ѡ
tName		ѡ
DoorGroupA	ѡŽȺ0
DoorGroupB	ѡŽȺ1
InfoGroup	ѡˢʾϢ
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function EnrolCardDel(ByVal MCID As Integer, ByVal CardID As String) As Boolean
: עڵĿżָػǷӦ

		˵
MCID		ѡID
CardID		ѡ
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function EnrolCardRead(ByVal MCID As Integer, ByVal CardID As String, Optional tName As String) As Boolean
: ȡڵĿżָػǷӦ

		˵
MCID		ѡID
CardID		ѡ
tName		ѡֵ()
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function EnrolCardCount(ByVal MCID As Integer) As Long
: ȡעע,-1ʱ

		˵
MCID		ѡID(MCIDֵ=ID+256ʱ,עб,ͨInceptAnnalȡ¼)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function InitMachine(ByVal MCID As Integer, Optional ByVal InitVal As MCUInitType = mInitValA) As Boolean
: ʼָػǷӦ

		˵
MCID		ѡID
InitVal		ѡ1=ָ;2=ע;3=ȫ(12)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function IDUp(ByVal MCID As Integer, ByVal NewID As Integer) As Boolean
: »IDŵָػǷӦ

		˵
MCID		ѡID
NewID		ѡµĻID
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function IPUp(ByVal MCID As Integer, ByVal nIp As String, ByVal nPort As Integer, ByVal nPwd As String) As Boolean
: »IPָػǷӦ

		˵
MCID		ѡID
nIp		ѡµĻIp
nPort		ѡµĻIp˿
nPwd		ѡµĻIp(ʱд)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function HostSetup(ByVal MCID As Integer, ByVal sIp As String, Optional ByVal sPort As Integer = 8788, Optional ByVal HostName As String) As Boolean
: ûתָػǷӦ

		˵
MCID		ѡID
sIp		ѡIP(һΪ·IP)
sPort		ѡתIP˿(ֵΪ16ıʱTCPķʽ,UDPķʽ)
HostName	ѡתIP
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function getClientAddr(ByVal MCID As Integer, ByVal Server_Host As String, ByVal Server_Port As Long) As String
: תлȡIPַ

		˵
MCID		ѡID
Server_Host	ѡתIP
Server_Port	ѡתIP˿
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function InceptCmd(ByVal MCID As Integer, Optional ByVal iCount As Long, Optional LastNote As String, Optional ByVal bSynchro As Boolean = True) As Boolean
InceptCmd (InceptAnnalָһʹ)
: ɼڵˢ¼ָػǷɹ

		˵
MCID		ѡID
iCount		ѡû¼ɼ(ֵ0ɼм¼)
LastNote	ѡдϴ()õָǲʱµָǲ,ʶһβɼ¼λ
		дָǲʱ"-1"һλÿʼ¼¼(:xxxxxx-1,xxxxxxΪָǲ),"-1"ͻʾѡ
		:д6λʱΪָصַָ,Ӹָλÿʼؼ¼
bSynchro	ѡ=True
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function InceptAnnal(Optional ByVal IncMode As InceptType = Inc_Note, Optional ByVal Amount As Long = 1) As Variant
InceptAnnal (InceptCmdָһʹ)
: ִInceptCmdָļ¼

		˵
IncMode		ѡزͣ0=ؼ¼;1=ؼ¼;2=¼;3=رβɼ¼)
Amount		ѡIncMode=0ʱ ָؼ¼(ֵ-1м¼)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function InfoRead(ByVal MCID As Integer, ByVal DNumber As Integer) As String
: ȡڵĹܶŵָضŲʱؿֵ

		˵
MCID		ѡID
DNumber		ѡű(0-71)ʱ2(0-1ʾ28);ˢ64(2-7ʾ28֡8-71ʾ12)
ز˵:	ˢŸʽ25|00-24|1111111|á
		1Ƕ״̬(25=00011001):bit0-1=1()ʾ򿪶;bit3=1ʾǰŲʱȡһ;bit4-5=1ʾŷǰ(0:\1:ǰ\2:ú\3:ֻ);(bit7=1ʱЧ)
		2ʱ(00-24)(ʾ024):ʾŵЧʱ
		3(1111111):ֵʾյЧ
		4Ƕ
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function InfoWrite(ByVal MCID As Integer, ByVal DNumber As Integer, ByVal StartHour As Single, ByVal EndHour As Single, ByVal State As Integer, ByVal DWeek As String, ByVal StrInfo As String) As Boolean
: дܶŵָػǷӦ

		˵
MCID            ѡID
Dnumber        	ѡű(0-71)ʱ2(0-1ʾ28);ˢ64(2-7ʾ28֡8-71ʾ12)
StartHour     	ѡʼʱ(Сʱ)
EndHour    	ѡʱ(Сʱ)
State		ѡ״̬bit0-1(0ر;1һ;2);bit3=1ʱʾǰŲʱȡһ;bit4-5(0:\1:+\2:+\3:ֻŲ :State=25(00011001)ʾ:ˢʱȶŸ,Чʱ䲻ʱȡһ
DWeek		ѡ(1;0ر) 磺0111110ʾһЧ1λպ͵7λʾЧ)
StrInfo		ѡ(ѧУʹʱΪ༶)
עStatebit0-1=0bit7=1ʱŹر;bit3λɸʱʵֱ\\Ϻõ(һҪbit3,Ҫһֱ¶ȡ)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function OpenLineKQ(ByVal MCID As Integer, Optional ByVal cval As Integer = 6) As Boolean
: ʹ/˳ʵʱϴ״ָ̬ػǷӦ

		˵
MCID            ѡID
cval		ѡֵһΪ6(3-15֮),ֵ=0ʱ˳ʵʱϴ״̬
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Event InputEventRe(ByVal StrNote As String, Respond As Integer, sTxt As String)
: ʵʱϴˢ¼ʽʱĴ¼(ֱӴInputEvent¼), OnLineKQ=TrueֵʱЧ(һڽʵʱˢ¼)

		˵
StrNote       	ػID\\ͷ
Respond		ûˢӦֵBit1=1ʾûԶı(sTxt);Bit2=1ûԶı;
		Bit3=1Ϳָ(ŽΪǰ);Bit4=1ڲעϢʾ;
		:Respond=22 (:10110)ʾ:ûԶ巢ıЧʱŰעʾͿָ
sTxt		ûԶʾ\ıƵBit1=1Bit2=1ʱЧ
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Event ProgressEvent(ByVal StrNote As String, ByVal nCount As Long, ByVal AllCount As Long)
: ϴˢ¼ʱĴ¼

            ˵
StrNote         ˢ
NCount          ǰϴ¼
AllCount  	ϴ¼ܺ
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function ReadDiabolo(ByVal MCID As Integer, ByVal DNumber As Integer) As String
: ȡڵʱָŽʱò

		˵
MCID		ѡID
DNumber		ѡʱʶID(1 - 16)
ʽ02  00:00 000 0 0000000 1Ǳ\2ʱ\3ʱ䳤\4ֱ\5
ڸʽ0111110ʾһЧ1λպ͵7λʾЧ)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function WriteDiabolo(ByVal MCID As Integer, ByVal DNumber As Integer, ByVal DDTime As String, ByVal DLTime As Integer, ByVal DWeek As String, Optional ByVal DOp As Boolean = True, Optional ByVal MusicID As Integer = 0) As Boolean
: дʱָػǷӦ

		˵
MCID		ѡID
DNumber		ѡʱʶID(1 - 16)
DDTime		ѡʱ(00:00)
DLTime		ѡ峤(0-120)
DWeek		ѡ(7λֵ1򿪡0ر)
DOp		ѡ=1ڲ忪
MusicID		ѡڲID
ڸʽ0111110ʾһЧ1λպ͵7λʾЧ)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function OpenDoor(ByVal MCID As Integer, ByVal OpenTime As Integer) As Boolean
: ԶƿŵָػǷӦ

		˵
MCID            ѡID
OpenTime	ѡʱ䳤(λ)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function ReadOpenDoor(ByVal MCID As Integer) As Integer
: ȡˢʱ䳤ȵָˢŽʱ䳤,-1ʱ

		˵
MCID		ѡID
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function WriteOpenDoor(ByVal MCID As Integer, ByVal OpenTime As Integer) As Boolean
: дˢŽʱ䳤ȵָػǷӦ

		˵
MCID		ѡID
OpenTime	ѡˢŽʱ䳤(λ0 - 255)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function S_RESET(ByVal MCID As Integer) As Boolean
: λ()ػǷӦ

		˵
MCID		ѡID
////////////////////////////////////////////////////////////////
----------------------------------------------------------------
Public Function TestKQJ(ByVal MCID As Integer) As String
: ָػ

		˵
MCID		ѡID
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function TimeUp(ByVal MCID As Integer, ByVal KQJTime As Variant) As Boolean
: »ʱָػǷӦ

		˵
MCID		ѡID
KQJTime		ѡʱֵ(ʽ1:yy-MM-dd hh:nn:ss; ʽ2:YYMMDDHHNNSS ȷ:12-05-01 08:00:00; :12-5-1 8:00:00)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function IOReSet(ByVal MCID As Integer, ByVal IOType As Integer, Parameter As Integer) As Boolean
: ŽȺָػǷӦ

		˵
MCID		ѡID
IOType		ѡ˿ڱż 0=˿1;1=˿2;2=˿1;3=˿2
Parameter	ѡزIOType=0-1ʱ{0=ر\1=ť(͵ƽЧ)\2=Ŵſ(͵ƽЧ)\3=(͵ƽЧ)\4=ť(ߵƽЧ)\5=Ŵſ(ߵƽЧ)\6=(ߵƽЧ)};IOType=2-3ʱ{0=ر\1=\2=Ž\3=}
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function IOSet(ByVal MCID As Integer, ByVal IOType As Integer, Parameter As Integer) As Boolean
: дŽȺָػǷӦ

		˵
MCID		ѡID
IOType		ѡ˿ڱż 0=˿1;1=˿2;2=˿1;3=˿2
Parameter	ѡIOType=0-1ʱ{0=ر\1=ť(͵ƽЧ)\2=Ŵſ(͵ƽЧ)\3=(͵ƽЧ)\4=ť(ߵƽЧ)\5=Ŵſ(ߵƽЧ)\6=(ߵƽЧ)};IOType=2-3ʱ{0=ر\1=\2=Ž\3=}
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function DoorGGroup(ByVal MCID As Integer, ByVal UserData As String, Optional ByVal bRead As Boolean = True) As String
: дŽȺָػǷӦ

		˵
MCID		ѡID
UserData	ѡдŽ(1-15)ʽ01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00һ𣬸ŵ7Žʱ(зʽ)ٸ8Žյšÿ֮öŸ			
bRead		ѡģʽ(True=ʱ ֵݡFalse=дʱ ֵΪձʾɹ)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function DoorZoneGroup(ByVal MCID As Integer, ByVal UserData As String, Optional ByVal bRead As Boolean = True) As String
: дŽʱָػǷӦ

		˵
MCID		ѡID
UserData	ѡдŽ(0-31)ʽ01 00 00 00 00һ𣬸ŵ4Žʱεţÿ֮öŸ			
bRead		ѡģʽ(True=ʱ ֵݡFalse=дʱ ֵΪձʾɹ)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function DoorHolidayGroup(ByVal MCID As Integer, ByVal UserData As String, Optional ByVal bRead As Boolean = True) As String
: дŽյָػǷӦ

		˵
MCID		ѡID
UserData	ѡдŽ(0-11)ʽ01-00-00-00ֱ¡ա״̬(0=ء1=2=)ÿ֮öŸ
bRead		ѡģʽ(True=ʱ ֵݡFalse=дʱ ֵΪձʾɹ)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function DoorTimeGroup(ByVal MCID As Integer, ByVal UserData As String, Optional ByVal bRead As Boolean = True) As String
: дŽʱεָػǷӦ

		˵
MCID		ѡID
UserData	ѡдŽ(0-31)ʽ01-00:00-00:00ֱʼʱ䡢ʱ䣬ÿ֮öŸ
bRead		ѡģʽ(True=ʱ ֵݡFalse=дʱ ֵΪձʾɹ)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function TextSend(ByVal MCID As Integer, ByVal sTxt As String, ByVal Row As Integer, Optional ByVal Sound As Boolean) As Boolean
: ıָػǷӦ

		˵
MCID		ѡID
sTxt		ı
Row		Ļʾֵ(1-4)
Sound		Ƿ
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function VolumeAdjust(ByVal MCID As Integer, Optional NewVal As Integer, Optional ByVal bRead As Boolean = True) As Boolean
: ָػǷӦ

		˵
MCID		ѡID
NewVal		ѡȼ(0 - 5)
bRead		ѡģʽ(True=ʱ ֵݡFalse=дʱ ֵΪձʾɹ)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function OutMode_TTS(ByVal MCID As Integer, Optional NewVal As Integer, Optional ByVal bRead As Boolean = True) As Boolean
: ʽָ(ֵ=0/1)ػǷӦ

		˵
MCID		ѡID
NewVal		ѡbRead=1;bRead=0д(0÷;1÷)
bRead		ѡģʽ(1 True=0 False=д)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function MusicTest(ByVal MCID As Integer, MusicID As Integer) As Boolean
: ָػǷӦ

		˵
MCID		ѡID
MusicID		ѡֱ(0 - 7)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function TimeAdjust(ByVal MCID As Integer, Optional NewVal As Integer, Optional ByVal bRead As Boolean = True) As Boolean
: ʱ΢ָػǷӦ

		˵
MCID		ѡID
NewVal		ѡ(-50+50λ)0ֵ=ʾʹáֵ=ʾÿֵ=ʾÿ
bRead		ѡģʽ(True=ʱ ֵݡFalse=дʱ ֵΪձʾɹ)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function CardPwdSet(ByVal MCID As Integer, hexPwd As String) As Boolean
: ICĶд롣ػǷӦ

		˵
MCID		ѡID
hexPwd		ѡܲ(6λʮֵ)
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function CardSetting(ByVal MCID As Integer, ByVal SectorAdr As Byte, hexData As String) As Boolean
: дICĹܲػǷӦ

		˵
MCID		ѡID
SectorAdr	ѡʹѡȡ(1 - 15)
hexData		ѡܲ(16λʮֵ)

////////////////////////////////////////////////////////////////

----------------------------------------------------------------
Public Function SendUserCode(ByVal CodeStr As String) As Boolean
: ָز״̬

		˵
CodeStr		ѡָ
Чָ(ŵĵַ):
		"#00-00-1"	ִкָֻ,رմ˹ܷ"#00-00-0"(ͨInceptAnnal(128)ȡ)
		"#00-01-1"	ֻϴµ(ûϴ)ˢ¼,رմ˹ܷ"#00-01-0"
		"#00-03-1"	رջе"ԵȺ"ʾ,رմ˹ܷ"#00-03-0"
////////////////////////////////////////////////////////////////

----------------------------------------------------------------
ICݲ˵:
0:	0-3ֽ:	Զ忨(3ֽڵλΪ0)
	4-5ֽ:	Ⱥżű
	6-15ֽ:	(λBit6=1ʱƲ)
1:	0-3ֽ:	һѵʱ (ʱ)
	4-4ֽ:	ۼˢ
	5-6ֽ:	ȫۼˢ
	7ֽ:		
	8ֽ:		ˢʱ(Bit7=0λΪ,ΪСʱ)
	9ֽ:		޶ˢ
	10-11ֽ:	ۼ޶ˢ
	12-13ֽ:	ƬЧʼ(32 14 = 100118 10*12*32+01*32+18=0F32H)
	14ֽ:		ƬЧ(0C = 12)
	15ֽ:		ܱ־λ(˵)
2:	1ݱ

4:	0-15ֽ:	,128Ĳ

ܱ־λ˵:
	Bit7	Ч=1;ע=0
	Bit6	ָʹû
	Bit5	ӻڶעϢ
	Bit4	ӻڶܲ
	Bit3	Զ忨
	Bit2	Զ(:ϴЧˢһ)
	Bit1-0	 = 01
////////////////////////////////////////////////////////////////

ָ:

: R5CM
ٶ: Q0.2
ͨŷʽ: RS-232;RS-485;TCP/IP;߽(;)
ע: R6000;ˢʱﱨϢ
¼: 88000(¼ɱ10)
: 70;ܷʱʾͬˢϢ,ﱨ
¼: 10
ʹû: -20桫80
󱸵Դ: 10Сʱ
Դ: DC12V/1A
: Q3W
ߴ: 117*128*38(mm) ʾ70*38(mm)
////////////////////////////////////////////////////////////////

Delphi 67 εActiveXؼĴ:
 
Tools˵->Environment Options->Type Libraryҳ,Ӧ÷һIgnore special CoClass Flags When ImportingѡȻѡCan CreateһôڣٳȥǸActiveXؼɣҪע⣬ѾһΣôѲļ .dcr  .pasļɾ򽫲ˢ£ǲActiveXзǸؼĻôֻµMicrosoftBorland